Enciclopedia Del Perro/Enciclopedia Del Perro.iso/recomen/wavmak22/wmwin.exe/0/RCDATA/TPLAYSAMPLEDLG/TPLAYSAMPLEDLG.txt

Text File | 1996-04-23 | 18KB | 649 lines

object playSampleDlg: TplaySampleDlg
  Left = 22
  Top = 68
  HelpContext = 1100
  BorderIcons = []
  BorderStyle = bsDialog
  Caption = 'Play sample'
  ClientHeight = 401
  ClientWidth = 433
  Font.Color = clBlack
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = [fsBold]
  OnActivate = FormActivate
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object Label1: TLabel
    Left = 16
    Top = 16
    Width = 21
    Height = 13
    Caption = 'File'
  end
  object Bevel6: TBevel
    Left = 8
    Top = 8
    Width = 305
    Height = 121
  end
  object Label3: TLabel
    Left = 16
    Top = 176
    Width = 38
    Height = 13
    Caption = 'Attack'
  end
  object Label4: TLabel
    Left = 16
    Top = 208
    Width = 50
    Height = 13
    Caption = 'Pressure'
  end
  object Label5: TLabel
    Left = 16
    Top = 240
    Width = 47
    Height = 13
    Caption = 'Release'
  end
  object Label6: TLabel
    Left = 16
    Top = 272
    Width = 63
    Height = 13
    Caption = 'Modulation'
  end
  object Label2: TLabel
    Left = 16
    Top = 144
    Width = 49
    Height = 13
    Caption = 'Duration'
  end
  object Bevel1: TBevel
    Left = 8
    Top = 136
    Width = 305
    Height = 257
  end
  object Bevel2: TBevel
    Left = 320
    Top = 8
    Width = 105
    Height = 89
  end
  object Label7: TLabel
    Left = 88
    Top = 144
    Width = 24
    Height = 13
    Caption = '(ms)'
  end
  object Label8: TLabel
    Left = 88
    Top = 176
    Width = 41
    Height = 13
    Caption = '(0-127)'
  end
  object Label9: TLabel
    Left = 88
    Top = 208
    Width = 41
    Height = 13
    Caption = '(0-127)'
  end
  object Label10: TLabel
    Left = 88
    Top = 240
    Width = 41
    Height = 13
    Caption = '(0-127)'
  end
  object Label11: TLabel
    Left = 88
    Top = 272
    Width = 41
    Height = 13
    Caption = '(0-127)'
  end
  object Note: TLabel
    Left = 152
    Top = 304
    Width = 28
    Height = 13
    Caption = 'Note'
  end
  object tempDir: TLabel
    Left = 328
    Top = 104
    Width = 44
    Height = 13
    Caption = 'tempDir'
    Visible = False
  end
  object WAVdir: TLabel
    Left = 328
    Top = 120
    Width = 43
    Height = 13
    Caption = 'WAVdir'
    Visible = False
  end
  object Label12: TLabel
    Left = 152
    Top = 336
    Width = 42
    Height = 13
    Caption = 'Octave'
  end
  object Label13: TLabel
    Left = 22
    Top = 370
    Width = 8
    Height = 13
    Caption = 'c'
  end
  object Label14: TLabel
    Left = 39
    Top = 370
    Width = 8
    Height = 13
    Caption = 'd'
  end
  object Label15: TLabel
    Left = 57
    Top = 370
    Width = 8
    Height = 13
    Caption = 'e'
  end
  object Label16: TLabel
    Left = 77
    Top = 370
    Width = 5
    Height = 13
    Caption = 'f'
  end
  object Label17: TLabel
    Left = 94
    Top = 370
    Width = 8
    Height = 13
    Caption = 'g'
  end
  object Label18: TLabel
    Left = 112
    Top = 370
    Width = 8
    Height = 13
    Caption = 'a'
  end
  object Label19: TLabel
    Left = 130
    Top = 370
    Width = 8
    Height = 13
    Caption = 'b'
  end
  object Keys1: TKeys
    Left = 16
    Top = 304
    Width = 127
    Height = 65
    NoteWidth = 18
    BlackBrush.Color = clBlack
    OnNoteOn = Keys1NoteOn
  end
  object HelpBtn: TBitBtn
    Left = 328
    Top = 320
    Width = 89
    Height = 33
    HelpContext = 1100
    TabOrder = 0
    OnClick = HelpBtnClick
    Kind = bkHelp
    Margin = 2
    Spacing = -1
    IsControl = True
  end
  object writeButton: TBitBtn
    Left = 328
    Top = 16
    Width = 89
    Height = 33
    Caption = 'Write file'
    TabOrder = 1
    OnClick = writeButtonClick
    Glyph.Data = {
      78010000424D7801000000000000760000002800000020000000100000000100
      04000000000000000000120B0000120B00000000000000000000000000000000
      800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
      333333FFFFFFFFFFFFF33000077777770033377777777777773F000007888888
      00037F3337F3FF37F37F00000780088800037F3337F77F37F37F000007800888
      00037F3337F77FF7F37F00000788888800037F3337777777337F000000000000
      00037F3FFFFFFFFFFF7F00000000000000037F77777777777F7F000FFFFFFFFF
      00037F7F333333337F7F000FFFFFFFFF00037F7F333333337F7F000FFFFFFFFF
      00037F7F333333337F7F000FFFFFFFFF00037F7F333333337F7F000FFFFFFFFF
      00037F7F333333337F7F000FFFFFFFFF07037F7F33333333777F000FFFFFFFFF
      0003737FFFFFFFFF7F73300999999999003337777777777777330000}
    NumGlyphs = 2
  end
  object playButton: TBitBtn
    Left = 328
    Top = 56
    Width = 89
    Height = 33
    Caption = 'Play file'
    TabOrder = 2
    OnClick = playButtonClick
    Glyph.Data = {
      78010000424D7801000000000000760000002800000020000000100000000100
      04000000000000000000120B0000120B00000000000000000000000000000000
      800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
      33333333333FFF3333F333333300033339333333337773F33733333330008033
      933333333737F7F37333333307078733333933337337373F3337333077088803
      33933337F37F337F3373333077088803393333F7337FF37F3733300777008803
      9333377F33773F7F733307088808087333337F7F337F7F7F3FFF070777080873
      99997F7F337F7F7F77770808880808733333737F337F737F3F33300888008803
      93333773F377337F73F333308807880339333337F37F337F373F333088077803
      339333373F73F37333733333087777333339333373F7F7F33F37333330807033
      933333333737F73373F3333333000333393333333377733337330000}
    NumGlyphs = 2
  end
  object fileEdit: TEdit
    Left = 48
    Top = 16
    Width = 257
    Height = 21
    TabOrder = 3
    Text = 'fileEdit'
    OnClick = fileEditExit
    OnExit = fileEditExit
    OnKeyPress = fileEditKeyPress
  end
  object stereoButton: TPanel
    Left = 16
    Top = 88
    Width = 137
    Height = 33
    TabOrder = 5
    object monoButton: TRadioButton
      Left = 8
      Top = 8
      Width = 57
      Height = 17
      Caption = 'Mono'
      TabOrder = 0
    end
    object RadioButton2: TRadioButton
      Left = 72
      Top = 8
      Width = 57
      Height = 17
      Caption = 'Stereo'
      Checked = True
      TabOrder = 1
      TabStop = True
    end
  end
  object Panel3: TPanel
    Left = 16
    Top = 48
    Width = 289
    Height = 33
    Caption = 'Panel3'
    TabOrder = 4
    object elevenButton: TRadioButton
      Left = 8
      Top = 8
      Width = 81
      Height = 17
      Caption = '11025 Hz'
      TabOrder = 0
    end
    object twentytwoButton: TRadioButton
      Left = 104
      Top = 8
      Width = 81
      Height = 17
      Caption = '22050 Hz'
      TabOrder = 1
    end
    object fourtyfourButton: TRadioButton
      Left = 200
      Top = 8
      Width = 73
      Height = 17
      Caption = '44100 Hz'
      Checked = True
      TabOrder = 2
      TabStop = True
    end
  end
  object Panel2: TPanel
    Left = 168
    Top = 88
    Width = 137
    Height = 33
    TabOrder = 6
    object eightButton: TRadioButton
      Left = 8
      Top = 8
      Width = 57
      Height = 17
      Caption = '8 bits'
      TabOrder = 0
    end
    object sixteenButton: TRadioButton
      Left = 64
      Top = 8
      Width = 57
      Height = 17
      Caption = '16 bits'
      Checked = True
      TabOrder = 1
      TabStop = True
    end
  end
  object durationEdit: TEdit
    Left = 152
    Top = 144
    Width = 129
    Height = 21
    TabOrder = 7
    Text = 'durationEdit'
    OnClick = durationEditExit
    OnEnter = durationEditEnter
    OnExit = durationEditExit
    OnKeyPress = durationEditKeyPress
  end
  object attackEdit: TEdit
    Left = 152
    Top = 176
    Width = 129
    Height = 21
    TabOrder = 9
    Text = 'attackEdit'
    OnClick = attackEditExit
    OnEnter = attackEditEnter
    OnExit = attackEditExit
    OnKeyPress = attackEditKeyPress
  end
  object pressureEdit: TEdit
    Left = 152
    Top = 208
    Width = 129
    Height = 21
    TabOrder = 11
    Text = 'pressureEdit'
    OnClick = pressureEditExit
    OnEnter = pressureEditEnter
    OnExit = pressureEditExit
    OnKeyPress = pressureEditKeyPress
  end
  object releaseEdit: TEdit
    Left = 152
    Top = 240
    Width = 129
    Height = 21
    TabOrder = 13
    Text = 'releaseEdit'
    OnClick = releaseEditExit
    OnEnter = releaseEditEnter
    OnExit = releaseEditExit
    OnKeyPress = releaseEditKeyPress
  end
  object modulationEdit: TEdit
    Left = 152
    Top = 272
    Width = 129
    Height = 21
    TabOrder = 15
    Text = 'modulationEdit'
    OnClick = modulationEditExit
    OnEnter = modulationEditEnter
    OnExit = modulationEditExit
    OnKeyPress = modulationEditKeyPress
  end
  object durationSpin: TSpinButton
    Left = 280
    Top = 145
    Width = 20
    Height = 19
    DownGlyph.Data = {
      A6000000424DA600000000000000760000002800000009000000060000000100
      0400000000003000000000000000000000000000000000000000000000000000
      8000008000000080800080000000800080008080000080808000C0C0C0000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333000
      0000333303333000000033300033300000003300000330000000300000003000
      00003333333330000000}
    TabOrder = 8
    UpGlyph.Data = {
      A6000000424DA600000000000000760000002800000009000000060000000100
      0400000000003000000000000000000000000000000000000000000000000000
      8000008000000080800080000000800080008080000080808000C0C0C0000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333000
      0000300000003000000033000003300000003330003330000000333303333000
      00003333333330000000}
    OnDownClick = durationSpinDownClick
    OnUpClick = durationSpinUpClick
  end
  object attackSpin: TSpinButton
    Left = 280
    Top = 177
    Width = 20
    Height = 19
    DownGlyph.Data = {
      A6000000424DA600000000000000760000002800000009000000060000000100
      0400000000003000000000000000000000000000000000000000000000000000
      8000008000000080800080000000800080008080000080808000C0C0C0000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333000
      0000333303333000000033300033300000003300000330000000300000003000
      00003333333330000000}
    TabOrder = 10
    UpGlyph.Data = {
      A6000000424DA600000000000000760000002800000009000000060000000100
      0400000000003000000000000000000000000000000000000000000000000000
      8000008000000080800080000000800080008080000080808000C0C0C0000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333000
      0000300000003000000033000003300000003330003330000000333303333000
      00003333333330000000}
    OnDownClick = attackSpinDownClick
    OnUpClick = attackSpinUpClick
  end
  object pressureSpin: TSpinButton
    Left = 280
    Top = 209
    Width = 20
    Height = 19
    DownGlyph.Data = {
      A6000000424DA600000000000000760000002800000009000000060000000100
      0400000000003000000000000000000000000000000000000000000000000000
      8000008000000080800080000000800080008080000080808000C0C0C0000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333000
      0000333303333000000033300033300000003300000330000000300000003000
      00003333333330000000}
    TabOrder = 12
    UpGlyph.Data = {
      A6000000424DA600000000000000760000002800000009000000060000000100
      0400000000003000000000000000000000000000000000000000000000000000
      8000008000000080800080000000800080008080000080808000C0C0C0000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333000
      0000300000003000000033000003300000003330003330000000333303333000
      00003333333330000000}
    OnDownClick = pressureSpinDownClick
    OnUpClick = pressureSpinUpClick
  end
  object rleaseSpin: TSpinButton
    Left = 280
    Top = 241
    Width = 20
    Height = 19
    DownGlyph.Data = {
      A6000000424DA600000000000000760000002800000009000000060000000100
      0400000000003000000000000000000000000000000000000000000000000000
      8000008000000080800080000000800080008080000080808000C0C0C0000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333000
      0000333303333000000033300033300000003300000330000000300000003000
      00003333333330000000}
    TabOrder = 14
    UpGlyph.Data = {
      A6000000424DA600000000000000760000002800000009000000060000000100
      0400000000003000000000000000000000000000000000000000000000000000
      8000008000000080800080000000800080008080000080808000C0C0C0000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333000
      0000300000003000000033000003300000003330003330000000333303333000
      00003333333330000000}
    OnDownClick = rleaseSpinDownClick
    OnUpClick = rleaseSpinUpClick
  end
  object modulationSpin: TSpinButton
    Left = 280
    Top = 273
    Width = 20
    Height = 19
    DownGlyph.Data = {
      A6000000424DA600000000000000760000002800000009000000060000000100
      0400000000003000000000000000000000000000000000000000000000000000
      8000008000000080800080000000800080008080000080808000C0C0C0000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333000
      0000333303333000000033300033300000003300000330000000300000003000
      00003333333330000000}
    TabOrder = 16
    UpGlyph.Data = {
      A6000000424DA600000000000000760000002800000009000000060000000100
      0400000000003000000000000000000000000000000000000000000000000000
      8000008000000080800080000000800080008080000080808000C0C0C0000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333000
      0000300000003000000033000003300000003330003330000000333303333000
      00003333333330000000}
    OnDownClick = modulationSpinDownClick
    OnUpClick = modulationSpinUpClick
  end
  object layerBox: TCheckBox
    Left = 232
    Top = 368
    Width = 73
    Height = 17
    Caption = 'All layers'
    TabOrder = 17
  end
  object noteEdit: TEdit
    Left = 208
    Top = 304
    Width = 73
    Height = 21
    TabOrder = 18
    Text = 'noteEdit'
    OnClick = noteEditClick
    OnEnter = noteEditEnter
    OnExit = noteEditExit
    OnKeyPress = noteEditKeyPress
  end
  object noteSpin: TSpinButton
    Left = 280
    Top = 305
    Width = 20
    Height = 19
    DownGlyph.Data = {
      A6000000424DA600000000000000760000002800000009000000060000000100
      0400000000003000000000000000000000000000000000000000000000000000
      8000008000000080800080000000800080008080000080808000C0C0C0000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333000
      0000333303333000000033300033300000003300000330000000300000003000
      00003333333330000000}
    TabOrder = 19
    UpGlyph.Data = {
      A6000000424DA600000000000000760000002800000009000000060000000100
      0400000000003000000000000000000000000000000000000000000000000000
      8000008000000080800080000000800080008080000080808000C0C0C0000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333000
      0000300000003000000033000003300000003330003330000000333303333000
      00003333333330000000}
    OnDownClick = noteSpinDownClick
    OnUpClick = noteSpinUpClick
  end
  object OKBtn: TBitBtn
    Left = 328
    Top = 360
    Width = 89
    Height = 33
    Caption = 'OK'
    ModalResult = 1
    TabOrder = 20
    OnClick = OKbtnClick
    Glyph.Data = {
      DE010000424DDE01000000000000760000002800000024000000120000000100
      0400000000006801000000000000000000000000000000000000000000000000
      8000008000000080800080000000800080008080000080808000C0C0C0000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
      3333333333333333333333330000333333333333333333333333F33333333333
      00003333344333333333333333377F3333333333000033334224333333333333
      337337F3333333330000333422224333333333333733337F3333333300003342
      222224333333333373333337F3333333000034222A22224333333337F337F333
      7F33333300003222A3A2224333333337F3737F337F33333300003A2A333A2224
      33333337F73337F337F33333000033A33333A222433333337333337F337F3333
      0000333333333A222433333333333337F337F33300003333333333A222433333
      333333337F337F33000033333333333A222433333333333337F337F300003333
      33333333A222433333333333337F337F00003333333333333A22433333333333
      3337F37F000033333333333333A223333333333333337F730000333333333333
      333A333333333333333337330000333333333333333333333333333333333333
      0000}
    Margin = 2
    NumGlyphs = 2
    Spacing = -1
    IsControl = True
  end
  object player: TMediaPlayer
    Left = 400
    Top = 104
    Width = 253
    Height = 30
    Visible = False
    TabOrder = 21
    OnNotify = playerNotify
  end
  object octaveEdit: TEdit
    Left = 208
    Top = 336
    Width = 73
    Height = 21
    TabOrder = 22
    Text = 'octaveEdit'
    OnClick = octaveEditClick
    OnEnter = octaveEditEnter
    OnExit = octaveEditExit
    OnKeyPress = octaveEditKeyPress
  end
  object octaveSpin: TSpinButton
    Left = 280
    Top = 337
    Width = 20
    Height = 19
    DownGlyph.Data = {
      A6000000424DA600000000000000760000002800000009000000060000000100
      0400000000003000000000000000000000000000000000000000000000000000
      8000008000000080800080000000800080008080000080808000C0C0C0000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333000
      0000333303333000000033300033300000003300000330000000300000003000
      00003333333330000000}
    TabOrder = 23
    UpGlyph.Data = {
      A6000000424DA600000000000000760000002800000009000000060000000100
      0400000000003000000000000000000000000000000000000000000000000000
      8000008000000080800080000000800080008080000080808000C0C0C0000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333000
      0000300000003000000033000003300000003330003330000000333303333000
      00003333333330000000}
    OnDownClick = octaveSpinDownClick
    OnUpClick = octaveSpinUpClick
  end
end